<?php	//back Combine H(N>R)
function H($iN,$iR)	{
	if(pInt($iN) && pInt($iN))	{
		return C($iN+$iR-1,$iR);
	}
	else	{return False;}
	
}
?>
<?php	//Combine C(N>R)
function C($iN,$iR)	{
	if(pInt($iN) && pInt($iN) &&($iN>=$iR))	{
		return P($iN,$iR)/factorial($iR);
	}
	else	{return False;}
	
}
?>
<?php	//Array P(N>R)
function P($iN,$iR)	{
	if(pInt($iN) && pInt($iN) &&($iN>=$iR))	{
		return factorial($iN)/factorial($iN-$iR);
	}
	else	{return False;}
}
?>
<?php	//factorial !N
function factorial($iN)	{
	if(pInt($iN))	{
		for($i=$iN-1;$i>1;$i--)	{$iN*=$i;}
		return $iN;	}
	else	if($iN==0)	{
		return 1;
	}else	{
		return False;
	}
}
?>
<?php	//positive integer;
function pInt($iN)	{
	if(is_int($iN) && $iN>0)	{return True;}
	else	{return False;}
}
?>